2140 HOME : VTAB 10: HTAB 4: PRINT "ENTER RANGE OF X VALUES TO COMPUTE:"
2150 PRINT : PRINT : HTAB 6: INPUT "1. ENTER MINIMUM X VALUE ";A
2160 PRINT : HTAB 6: INPUT "2. ENTER MAXIMUM X VALUE ";B
2170 HOME : VTAB 4: HTAB 4: PRINT "IF YOU DON'T SPECIFY THE Y RANGE,": PRINT : HTAB 4: PRINT "THE PROGRAM WILL NORMALIZE Y VALUES": PRINT
2180 HTAB 4: PRINT "TO FILL THE PLOTTING SPACE EXACTLY": PRINT : PRINT : PRINT
2190 HTAB 7: PRINT "DO YOU WANT TO SPECIFY": HTAB 7: PRINT "THE Y RANGE (Y/N) ? ";: GET A$: PRINT : PRINT
2200 IF A$ < >"Y" THEN YR% = 1: GOTO 2260
2210 YR% = 2: HTAB 7: INPUT "1.ENTER MINIMUM Y VALUE ";C
2220 PRINT : HTAB 7: INPUT "2.ENTER MAXIMUM Y VALUE ";D
2260 HOME : VTAB 6: HTAB 4: PRINT "HOW MANY POINTS DO YOU WANT TO PLOT?": PRINT : HTAB 6: INPUT "ENTER A NUMBER FROM 10 TO 50: ";P
2270 IF P <10 OR P >50 THEN HOME : VTAB 8: GOTO 2260
2280 HOME : VTAB 6: HTAB 6: PRINT "TYPE IN THE TITLE OF YOUR GRAPH:": PRINT : INPUT " ";TI$
2290 IF LEN(TI$) <51 THEN HOME : VTAB 6: GOTO 2320
2300 VTAB 12: HTAB 10: PRINT "TITLE IS TOO LONG BY "; LEN(TI$) -51: PRINT
2310 HTAB 8: PRINT "HIT ANY KEY TO CONTINUE ";: GET A$: GOTO 2280
2320 VTAB 10: HTAB 6: PRINT "CHOOSE ANY CHARACTER EXCEPT": PRINT : HTAB 6: PRINT ". (PERIOD) TO PLOT DATA POINTS."
2330 PRINT : HTAB 6: PRINT "YOU CAN PRINT EITHER AN UPPER": PRINT : HTAB 6: PRINT "OR LOWER CASE CHARACTER": PRINT : HTAB 10: PRINT "ENTER A CHARACTER ";: GET S1$
2340 IF S1$ = "." THEN HOME : VTAB 9: HTAB 7: PRINT "ANYTHING BUT A PERIOD!!": VTAB 22: HTAB 7: PRINT "HIT ANY KEY TO CONTINUE ";: GET A$: HOME : GOTO 2320
2350 IF ASC(S1$) <65 OR ASC(S1$) >90 THEN 3010
2360 PRINT : PRINT : HTAB 6: PRINT "DO YOU WANT LOWER CASE? (Y/N) ";: GET A$: IF A$ < >"Y" THEN 3010